home *** CD-ROM | disk | FTP | other *** search
/ PC World 2004 June / PCWorld_2004-06_cd.bin / software / vyzkuste / koolmoves / kmsetup.exe / {app} / Motion Scripts / Bar Write On / effect2.txt
Encoding:
Text File  |  2004-03-29  |  1.8 KB  |  75 lines
  1. // main_init function
  2.  
  3. main_init = function(mc){
  4.  box = function ( mc, tl_x, tl_y, br_x, br_y ){
  5.   mc.lineStyle();
  6.   mc.beginFill(0);
  7.   mc.moveTo (tl_x,tl_y);
  8.   mc.lineTo (br_x,tl_y);
  9.   mc.lineTo (br_x,br_y);
  10.   mc.lineTo (tl_x,br_y);
  11.   mc.endFill();
  12.  }
  13.  sw_box = function ( mc, tl_x, tl_y, br_x, br_y, cf ){
  14.   mc.lineStyle();
  15.   var colors = [cf,cf];
  16.   var alphas = [100,0];
  17.   var ratios = [192,255];
  18.   var matrix = { matrixType:"box", r:0 };
  19.   matrix.x = tl_x;
  20.   matrix.y = tl_y;
  21.   matrix.w = br_x-tl_x; 
  22.   matrix.h = br_y-tl_y;
  23.   mc.beginGradientFill( "radial", colors, alphas, ratios, matrix );
  24.   mc.moveTo (tl_x,tl_y);
  25.   mc.lineTo (br_x,tl_y);
  26.   mc.lineTo (br_x,br_y);
  27.   mc.lineTo (tl_x,br_y);
  28.   mc.endFill();
  29.  }
  30.  subs_done = true;
  31.  createEmptyMovieClip("msk",6);
  32.  createEmptyMovieClip("sw",7);
  33.  b = mc.getBounds(mc);
  34.  p = $padding / 2;
  35.  if ((out_effect && !rtol) || (rtol && !out_effect)){
  36.   box(msk,0,b.yMin,mc._width+10,b.yMax);
  37.  }else{
  38.   box(msk,-mc._width-10,b.yMin,0,b.yMax);
  39.  }
  40.  mc.setMask(msk);
  41.  sw_box(sw,-2,b.yMin+p-30,2,b.yMax-p+30,sw_color);
  42.  msk._x = sw._x = rtol ? b.xMax-p+5 : b.xMin+p-5;
  43.  sw._alpha = sw.alpha = 0;
  44. }
  45.  
  46. // main_effect function
  47.  
  48. main_effect = function(mc,frame){
  49.  if (sw._alpha<100 && (rtol ? sw._x > 0 : sw._x < 0)){
  50.   sw._yscale = sw._alpha = sw.alpha += 20;
  51.  } else {
  52.   msk._x = sw._x+= rtol ? -sw_speed : sw_speed;
  53.   if (sw._x >= b.xMax-p+5 || sw._x <= b.xMin+p-5){
  54.    msk._x = sw._x = rtol ? b.xMin+p-5 : b.xMax-p+5;
  55.    sw._alpha = sw.alpha -=20;
  56.    if (sw._alpha<=0){
  57.     sw.removeMovieClip();
  58.     msk.removeMovieClip();
  59.     if (out_effect) mc._alpha = 0;
  60.     end_effect=true;
  61.    }
  62.   }
  63.  }
  64. }
  65.  
  66. // sub_init function
  67.  
  68. sub_init = function(mc){
  69. }
  70.  
  71. // sub_effect function
  72.  
  73. sub_effect = function(mc,frame){
  74. }
  75.